home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 11 / Cream of the Crop 11-1.iso / comm / 110a115a.zip / SCRIPTS.ZIP / PATH.SLT < prev    next >
Text File  |  1995-12-21  |  1KB  |  22 lines
  1. /****************************************************************/
  2. /*                                                              */
  3. /*  Demo of how to use and manipulate the DOS path and current  */
  4. /*  directory used by the TFW application (not other apps).     */
  5. /*                                                              */
  6. /*                   Copyright 1995 deltaComm Development, Inc. */
  7. /*                                                              */
  8. /****************************************************************/
  9.  
  10. main()
  11. {
  12.  str ss[30], st[30];
  13.  inputbox("", "Filename: ", st);         // Get filename from user
  14.  fnstrip(st, 12, ss);                    // Strip user input to PATH only
  15.  printsc("Path = ");
  16.  prints(ss);                             // Display the results
  17.  fnstrip(st, 11, ss);                    // Strip user input to extention only
  18.  
  19.  if (ss="slt")                           // If the user named SALT source file
  20.    compilescript(st);                    // then compile it!
  21. }
  22.